Support de-alt dictionary with Aspell.

* lisp/textmodes/ispell.el (ispell-aspell-find-dictionary):
Support Aspell dictionaries with names like "de-alt".  (Bug#20581)

diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index 43003afe543e55de37d05586218c87d2b89f9fe8..8107f794e0759d48aded7d3122182ebde7dfc0ec 100644 (file)
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -1077,7 +1077,8 @@ of `ispell-dictionary-base-alist' elements."
             ;; Try xx.dat first, strip out variant, country code, etc,
             ;; then try xx_YY.dat (without stripping country code).
             (dolist (tmp-regexp (list "^[[:alpha:]]+"
-                                      "^[[:alpha:]_]+"))
+                                      "^[[:alpha:]_]+"
+                                       "^[[:alpha:]]+-\\(alt\\|old\\)"))
               (let ((fullpath
                      (concat tmp-path "/"
                              (and (string-match tmp-regexp dict-name)